﻿Imports BUS

Public Class frmTuyChonXuatDSNV

    Private iTuyChon As Integer = 0

    Private Sub frmTuyChonXuatDSNV_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        rdall.Checked = True

        cbobophan.DataSource = BoPhanBus.LayDanhSach
        cbobophan.DisplayMember = "tenbp"
        cbobophan.ValueMember = "mabp"
    End Sub

    Private Sub rdall_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdall.CheckedChanged
        If rdall.Checked = True Then
            iTuyChon = 1
            cbobophan.Enabled = False
            dttungay.Enabled = False
            dtdenngay.Enabled = False
        End If
    End Sub

    Private Sub rdbophan_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbophan.CheckedChanged
        If rdbophan.Checked = True Then
            iTuyChon = 2
            cbobophan.Enabled = True
            dttungay.Enabled = False
            dtdenngay.Enabled = False
        End If
    End Sub

    Private Sub rdngay_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdngay.CheckedChanged
        If rdngay.Checked = True Then
            iTuyChon = 3
            cbobophan.Enabled = False
            dttungay.Enabled = True
            dtdenngay.Enabled = True
        End If
    End Sub

    Private Sub btndongy_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndongy.Click

    End Sub

    Private Sub btndong_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndong.Click
        Me.Close()
    End Sub




End Class